home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / src / gdb-4.12 / sim / sh / interp.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-03  |  14.5 KB  |  801 lines
  1. /* Simulator for the Hitachi SH architecture.
  2.  
  3.    Written by Steve Chamberlain of Cygnus Support.
  4.    sac@cygnus.com
  5.  
  6.    This file is part of SH sim
  7.  
  8.  
  9.         THIS SOFTWARE IS NOT COPYRIGHTED
  10.  
  11.    Cygnus offers the following for use in the public domain.  Cygnus
  12.    makes no warranty with regard to the software or it's performance
  13.    and the user accepts the software "AS IS" with all faults.
  14.  
  15.    CYGNUS DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD TO
  16.    THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  17.    MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  18.  
  19. */
  20.  
  21. #include <signal.h>
  22. #include "sysdep.h"
  23. #include <sys/times.h>
  24. #include <sys/param.h>
  25. #include "bfd.h"
  26. #include "remote-sim.h"
  27.  
  28. #define O_RECOMPILE 85
  29. #define DEFINE_TABLE
  30.  
  31. #define DISASSEMBLER_TABLE
  32.  
  33. #define SBIT(x) ((x)&sbit)
  34. #define R0     saved_state.asregs.regs[0]
  35. #define Rn     saved_state.asregs.regs[n]
  36. #define Rm     saved_state.asregs.regs[m]
  37. #define UR0     (unsigned int)(saved_state.asregs.regs[0])
  38. #define UR     (unsigned int)R
  39. #define UR     (unsigned int)R
  40. #define SR0     saved_state.asregs.regs[0]
  41. #define GBR     saved_state.asregs.gbr
  42. #define VBR     saved_state.asregs.vbr
  43. #define MACH     saved_state.asregs.mach
  44. #define MACL     saved_state.asregs.macl
  45. #define M     saved_state.asregs.sr.bits.m
  46. #define Q     saved_state.asregs.sr.bits.q
  47.  
  48. #define GET_SR() (saved_state.asregs.sr.bits.t = T, saved_state.asregs.sr.word)
  49. #define SET_SR(x) {saved_state.asregs.sr.word = (x); T =saved_state.asregs.sr.bits.t;}
  50.  
  51. #define PC pc
  52. #define C cycles
  53.  
  54. #ifdef TARGET_BIG_ENDIAN
  55. #define LMEM(x)     *((long *)(memory+((x)&maskl)))
  56. #define BMEM(x)     *((char *)(memory+((x)&maskb)))
  57. #define UWMEM(x)     *((unsigned short *)(memory+((x)&maskw)))
  58. #define SWMEM(x)     *((short *)(memory+((x)&maskw)))
  59. #define WLAT(x,value)      (LMEM(x) = value)
  60. #define RLAT(x)      (LMEM(x))
  61. #define WWAT(x,value)      (UWMEM(x) = value)
  62. #define RSWAT(x)      (SWMEM(x))
  63. #define RUWAT(x)      (UWMEM(x))
  64. #define WBAT(x,value)      (BMEM(x) = value)
  65. #define RBAT(x)      (BMEM(x))
  66. #else
  67. /* For little endian or unknown host machines */
  68. #define WLAT(x,value)\
  69. { int v = value; unsigned char *p = memory + ((x) & maskl);\
  70.   p[0] =v>>24;p[1] = v>>16;p[2]=v>>8;p[3]=v; }
  71.  
  72. #define WWAT(x,value)\
  73. { int v = value; unsigned char *p = memory + (x & maskw);p[0] =v>>8;p[1] = v ;}
  74.  
  75. #define WBAT(x,value)\
  76. { unsigned char *p = memory + (x & maskb);p[0] =value;}
  77.  
  78. #define RLAT(x)\
  79.   ((memory[x&maskl]<<24)|(memory[(x&maskl)+1]<<16)|(memory[(x&maskl)+2]<<8)| (memory[(x&maskl)+3]))
  80.  
  81. #define RWAT(x)\
  82.   ((memory[x&maskw]<<8)|(memory[(x&maskw)+1]))
  83.  
  84. #define RBAT(x)\
  85.   ((memory[x&maskb]))
  86.  
  87. #define RUWAT(x)  (RWAT(x) & 0xffff)
  88. #define RSWAT(x)  ((short)(RWAT(x)))
  89. #define RSBAT(x)  (SEXT(RBAT(x)))
  90.  
  91. #endif
  92.  
  93.  
  94.  
  95. #define SEXT(x)         (((x&0xff) ^ (~0x7f))+0x80)
  96. #define SEXTW(y)        ((int)((short)y))
  97.  
  98. #define SL(TEMPPC)      iword= RUWAT(TEMPPC); goto top;
  99.  
  100.  
  101. #define L(x)   thislock = x;
  102. #define TL(x)  if ((x) == prevlock) stalls++;
  103. #define TB(x,y)  if ((x) == prevlock || (y)==prevlock) stalls++;
  104. int sim_memory_size = 19;
  105. static int sim_profile_size = 17;
  106. static int nsamples;
  107. static int sim_timeout;
  108.  
  109. typedef union
  110. {
  111.  
  112.   struct
  113.     {
  114.  
  115.       int regs[16];
  116.       int pc;
  117.       int pr;
  118.  
  119.       int gbr;
  120.       int vbr;
  121.       int mach;
  122.       int macl;
  123.  
  124.  
  125.       union
  126.     {
  127.       struct
  128.         {
  129.           unsigned int d0:22;
  130.           unsigned int m:1;
  131.           unsigned int q:1;
  132.           unsigned int i:4;
  133.           unsigned int d1:2;
  134.           unsigned int s:1;
  135.           unsigned int t:1;
  136.         }
  137.       bits;
  138.       int word;
  139.     }
  140.       sr;
  141.       int ticks;
  142.       int stalls;
  143.       int cycles;
  144.       int insts;
  145.  
  146.  
  147.       int prevlock;
  148.       int thislock;
  149.       int exception;
  150.       int msize;
  151. #define PROFILE_FREQ 1
  152. #define PROFILE_SHIFT 2
  153.       int profile;
  154.       unsigned short *profile_hist;
  155.       unsigned char *memory;
  156.  
  157.     }
  158.   asregs;
  159.   int asints[28];
  160.  
  161. }
  162.  
  163. saved_state_type;
  164. saved_state_type saved_state;
  165.  
  166. static int
  167. get_now ()
  168. {
  169.   return time((char*)0);
  170. }
  171.  
  172. static int
  173. now_persec ()
  174. {
  175.   return 1;
  176. }
  177.  
  178.  
  179.  
  180. static FILE *profile_file;
  181.  
  182. static void 
  183. swap (b, n)
  184.      unsigned char *b;
  185.      int n;
  186. {
  187.   b[0] = n >> 24;
  188.   b[1] = n >> 16;
  189.   b[2] = n >> 8;
  190.   b[3] = n >> 0;
  191. }
  192. static void 
  193. swap16 (b, n)
  194.      unsigned char *b;
  195.      int n;
  196. {
  197.   b[0] = n >> 8;
  198.   b[1] = n >> 0;
  199. }
  200.  
  201. static void
  202. swapout (n)
  203.      int n;
  204. {
  205.   if (profile_file)
  206.     {
  207.       char b[4];
  208.       swap (b, n);
  209.       fwrite (b, 4, 1, profile_file);
  210.     }
  211. }
  212.  
  213. static void
  214. swapout16 (n)
  215.      int n;
  216. {
  217.   char b[4];
  218.   swap16 (b, n);
  219.   fwrite (b, 2, 1, profile_file);
  220. }
  221.  
  222.  
  223. /* Turn a pointer in a register into a pointer into real memory. */
  224.  
  225. static char *
  226. ptr (x)
  227.      int x;
  228. {
  229.   return (char *) (x + saved_state.asregs.memory);
  230. }
  231.  
  232. /* Simulate a monitor trap, put the result into r0 and errno into r1 */
  233.  
  234. static void
  235. trap (i, regs)
  236.      int i;
  237.      int *regs;
  238. {
  239.   switch (i)
  240.     {
  241.     case 1:
  242.       printf ("%c", regs[0]);
  243.       break;
  244.     case 2:
  245.       saved_state.asregs.exception = SIGQUIT;
  246.       break;
  247.     case 3:
  248.       {
  249.     extern int errno;
  250.     int perrno = errno;
  251.     errno = 0;
  252.  
  253.     switch (regs[4])
  254.       {
  255.       case 3:
  256.         regs[0] = read (regs[5], ptr (regs[6]), regs[7]);
  257.         break;
  258.       case 4:
  259.         regs[0] = write (regs[5], ptr (regs[6]), regs[7]);
  260.         break;
  261.       case 19:
  262.         regs[0] = lseek (regs[5], regs[6], regs[7]);
  263.         break;
  264.       case 6:
  265.         regs[0] = close (regs[5]);
  266.         break;
  267.       case 5:
  268.         regs[0] = open (ptr (regs[5]), regs[6]);
  269.         break;
  270.       case 1:
  271.         /* EXIT */
  272.         saved_state.asregs.exception = SIGQUIT;
  273.         errno = regs[5];
  274.         break;
  275.         
  276.       default:
  277.         abort ();
  278.       }
  279.     regs[1] = errno;
  280.     errno = perrno;
  281.       }
  282.  
  283.       break;
  284.  
  285.     case 255:
  286.       saved_state.asregs.exception = SIGTRAP;
  287.       saved_state.asregs.exception = 5;
  288.       break;
  289.     }
  290.  
  291. }
  292. void
  293. control_c (sig, code, scp, addr)
  294.      int sig;
  295.      int code;
  296.      char *scp;
  297.      char *addr;
  298. {
  299.   saved_state.asregs.exception = SIGINT;
  300. }
  301.  
  302.  
  303. static int
  304. div1 (R, iRn2, iRn1, T)
  305.      int *R;
  306.      int iRn1;
  307.      int iRn2;
  308.      int T;
  309. {
  310.   unsigned long tmp0;
  311.   unsigned char old_q, tmp1;
  312.  
  313.   old_q = Q;
  314.   Q = (unsigned char) ((0x80000000 & R[iRn1]) != 0);
  315.   R[iRn1] <<= 1;
  316.   R[iRn1] |= (unsigned long) T;
  317.  
  318.   switch (old_q)
  319.     {
  320.     case 0:
  321.       switch (M)
  322.     {
  323.     case 0:
  324.       tmp0 = R[iRn1];
  325.       R[iRn1] -= R[iRn2];
  326.       tmp1 = (R[iRn1] > tmp0);
  327.       switch (Q)
  328.         {
  329.         case 0:
  330.           Q = tmp1;
  331.           break;
  332.         case 1:
  333.           Q = (unsigned char) (tmp1 == 0);
  334.           break;
  335.         }
  336.       break;
  337.     case 1:
  338.       tmp0 = R[iRn1];
  339.       R[iRn1] += R[iRn2];
  340.       tmp1 = (R[iRn1] < tmp0);
  341.       switch (Q)
  342.         {
  343.         case 0:
  344.           Q = (unsigned char) (tmp1 == 0);
  345.           break;
  346.         case 1:
  347.           Q = tmp1;
  348.           break;
  349.         }
  350.       break;
  351.     }
  352.       break;
  353.     case 1:
  354.       switch (M)
  355.     {
  356.     case 0:
  357.       tmp0 = R[iRn1];
  358.       R[iRn1] += R[iRn2];
  359.       tmp1 = (R[iRn1] < tmp0);
  360.       switch (Q)
  361.         {
  362.         case 0:
  363.           Q = tmp1;
  364.           break;
  365.         case 1:
  366.           Q = (unsigned char) (tmp1 == 0);
  367.           break;
  368.         }
  369.       break;
  370.     case 1:
  371.       tmp0 = R[iRn1];
  372.       R[iRn1] -= R[iRn2];
  373.       tmp1 = (R[iRn1] > tmp0);
  374.       switch (Q)
  375.         {
  376.         case 0:
  377.           Q = (unsigned char) (tmp1 == 0);
  378.           break;
  379.         case 1:
  380.           Q = tmp1;
  381.           break;
  382.         }
  383.       break;
  384.     }
  385.       break;
  386.     }
  387.   T = (Q == M);
  388.   return T;
  389. }
  390.  
  391.  
  392. static void 
  393. dmul (sign, rm, rn)
  394.      int sign;
  395.      unsigned int rm;
  396.      unsigned int rn;
  397. {
  398.   unsigned long RnL, RnH;
  399.   unsigned long RmL, RmH;
  400.   unsigned long temp0, temp1, temp2, temp3;
  401.   unsigned long Res2, Res1, Res0;
  402.  
  403.  
  404.   if (!sign)
  405.     {
  406.  
  407.       RnL = rn & 0xffff;
  408.       RnH = (rn >> 16) & 0xffff;
  409.       RmL = rm & 0xffff;
  410.       RmH = (rm >> 16) & 0xffff;
  411.       temp0 = RmL * RnL;
  412.       temp1 = RmH * RnL;
  413.       temp2 = RmL * RnH;
  414.       temp3 = RmH * RnH;
  415.       Res2 = 0;
  416.       Res1 = temp1 + temp2;
  417.       if (Res1 < temp1)
  418.     Res2 += 0x00010000;
  419.       temp1 = (Res1 << 16) & 0xffff0000;
  420.       Res0 = temp0 + temp1;
  421.       if (Res0 < temp0)
  422.     Res2 += 1;
  423.       Res2 += ((Res1 >> 16) & 0xffff) + temp3;
  424.       MACH = Res2;
  425.       MACL = Res0;
  426.  
  427.     }
  428.  
  429.   else
  430.     {
  431.       abort ();
  432.     }
  433.  
  434. }
  435.  
  436.  
  437. /* Set the memory size to the power of two provided. */
  438.  
  439. void
  440. sim_size (power)
  441.      int power;
  442.  
  443. {
  444.   saved_state.asregs.msize = 1 << power;
  445.  
  446.   sim_memory_size = power;
  447.  
  448.  
  449.   if (saved_state.asregs.memory)
  450.     {
  451.       free (saved_state.asregs.memory);
  452.     }
  453.  
  454.   saved_state.asregs.memory =
  455.     (unsigned char *) calloc (64, saved_state.asregs.msize / 64);
  456.  
  457.   if (!saved_state.asregs.memory)
  458.     {
  459.       fprintf (stderr,
  460.            "Not enough VM for simuation of %d bytes of RAM\n",
  461.            saved_state.asregs.msize);
  462.  
  463.       saved_state.asregs.msize = 1;
  464.       saved_state.asregs.memory = (unsigned char *) calloc (1, 1);
  465.     }
  466. }
  467.  
  468.  
  469.  
  470. static
  471. void
  472. init_pointers ()
  473. {
  474.   if (saved_state.asregs.msize != 1 << sim_memory_size)
  475.     {
  476.       sim_size (sim_memory_size);
  477.     }
  478.  
  479.   if (saved_state.asregs.profile && !profile_file)
  480.     {
  481.       profile_file = fopen ("gmon.out", "wb");
  482.       /* Seek to where to put the call arc data */
  483.       nsamples = (1 << sim_profile_size);
  484.  
  485.       fseek (profile_file, nsamples * 2 + 12, 0);
  486.  
  487.       if (!profile_file)
  488.     {
  489.       fprintf (stderr, "Can't open gmon.out\n");
  490.     }
  491.       else
  492.     {
  493.       saved_state.asregs.profile_hist =
  494.         (unsigned short *) calloc (64, (nsamples * sizeof (short) / 64));
  495.     }
  496.     }
  497. }
  498.  
  499. static void
  500. dump_profile ()
  501. {
  502.   unsigned int minpc;
  503.   unsigned int maxpc;
  504.   unsigned short *p;
  505.  
  506.   int thisshift;
  507.  
  508.   unsigned short *first;
  509.  
  510.   int i;
  511.   p = saved_state.asregs.profile_hist;
  512.   minpc = 0;
  513.   maxpc = (1 << sim_profile_size);
  514.  
  515.   fseek (profile_file, 0L, 0);
  516.   swapout (minpc << PROFILE_SHIFT);
  517.   swapout (maxpc << PROFILE_SHIFT);
  518.   swapout (nsamples * 2 + 12);
  519.   for (i = 0; i < nsamples; i++)
  520.     swapout16 (saved_state.asregs.profile_hist[i]);
  521.  
  522. }
  523.  
  524. static int 
  525. gotcall (from, to)
  526.      int from;
  527.      int to;
  528. {
  529.   swapout (from);
  530.   swapout (to);
  531.   swapout (1);
  532. }
  533.  
  534. #define MMASKB ((saved_state.asregs.msize -1) & ~0)
  535. int
  536. sim_resume (step, siggnal)
  537.      int step, siggnal;
  538. {
  539.   register unsigned int pc;
  540.   register int cycles = 0;
  541.   register int stalls = 0;
  542.   register int insts = 0;
  543.   register int prevlock;
  544.   register int thislock;
  545.   register unsigned int doprofile;
  546.  
  547.   int tick_start = get_now ();
  548.   void (*prev) ();
  549.   extern unsigned char sh_jump_table0[];
  550.  
  551.   register unsigned char *jump_table = sh_jump_table0;
  552.  
  553.   register int *R = &(saved_state.asregs.regs[0]);
  554.   register int T;
  555.   register int PR;
  556.  
  557.   register int maskb = ((saved_state.asregs.msize - 1) & ~0);
  558.   register int maskw = ((saved_state.asregs.msize - 1) & ~1);
  559.   register int maskl = ((saved_state.asregs.msize - 1) & ~3);
  560.   register unsigned char *memory ;
  561.   register unsigned int sbit = (1 << 31);
  562.  
  563.   prev = signal (SIGINT, control_c);
  564.  
  565.   init_pointers ();
  566.  
  567.   memory = saved_state.asregs.memory;
  568.  
  569.   if (step)
  570.     {
  571.       saved_state.asregs.exception = SIGTRAP;
  572.     }
  573.   else
  574.     {
  575.       saved_state.asregs.exception = 0;
  576.     }
  577.  
  578.   pc = saved_state.asregs.pc;
  579.   PR = saved_state.asregs.pr;
  580.   T = saved_state.asregs.sr.bits.t;
  581.   prevlock = saved_state.asregs.prevlock;
  582.   thislock = saved_state.asregs.thislock;
  583.   doprofile = saved_state.asregs.profile;
  584.  
  585.   /* If profiling not enabled, disable it by asking for
  586.      profiles infrequently. */
  587.   if (doprofile == 0)
  588.     doprofile = ~0;
  589.  
  590.   do
  591.     {
  592.       register unsigned int iword = RUWAT (pc);
  593.       register unsigned int ult;
  594.  
  595.       insts++;
  596.     top:
  597.  
  598. #include "code.c"
  599.  
  600.  
  601.       pc += 2;
  602.       prevlock = thislock;
  603.       thislock = 30;
  604.       cycles++;
  605.  
  606.       if (cycles >= doprofile)
  607.     {
  608.       if (cycles > sim_timeout)
  609.         saved_state.asregs.exception = SIGQUIT;
  610.       
  611.       saved_state.asregs.cycles += doprofile;
  612.       cycles -= doprofile;
  613.       if (saved_state.asregs.profile_hist)
  614.         {
  615.           int n = pc >> PROFILE_SHIFT;
  616.           if (n < nsamples)
  617.         {
  618.           int i = saved_state.asregs.profile_hist[n];
  619.           if (i < 65000)
  620.             saved_state.asregs.profile_hist[n] = i + 1;
  621.         }
  622.  
  623.         }
  624.     }
  625.     }
  626.   while (!saved_state.asregs.exception);
  627.  
  628.   if (saved_state.asregs.exception == SIGILL)
  629.     {
  630.       pc -= 2;
  631.     }
  632.  
  633.   saved_state.asregs.ticks += get_now () - tick_start;
  634.   saved_state.asregs.cycles += cycles;
  635.   saved_state.asregs.stalls += stalls;
  636.   saved_state.asregs.insts += insts;
  637.   saved_state.asregs.pc = pc;
  638.   saved_state.asregs.sr.bits.t = T;
  639.   saved_state.asregs.pr = PR;
  640.  
  641.   saved_state.asregs.prevlock = prevlock;
  642.   saved_state.asregs.thislock = thislock;
  643.  
  644.  
  645.   if (profile_file)
  646.     {
  647.       dump_profile ();
  648.     }
  649.  
  650.   signal (SIGINT, prev);
  651.  
  652.   return 0;
  653. }
  654.  
  655.  
  656.  
  657.  
  658. int
  659. sim_write (addr, buffer, size)
  660.      SIM_ADDR addr;
  661.      unsigned char *buffer;
  662.      int size;
  663. {
  664.   int i;
  665.   init_pointers ();
  666.  
  667.   for (i = 0; i < size; i++)
  668.     {
  669.       saved_state.asregs.memory[MMASKB & (addr + i)] = buffer[i];
  670.     }
  671.   return size;
  672. }
  673.  
  674. int
  675. sim_read (addr, buffer, size)
  676.      SIM_ADDR addr;
  677.      unsigned char *buffer;
  678.      int size;
  679. {
  680.   int i;
  681.  
  682.   init_pointers ();
  683.  
  684.   for (i = 0; i < size; i++)
  685.     {
  686.       buffer[i] = saved_state.asregs.memory[MMASKB & (addr + i)];
  687.     }
  688.   return size;
  689. }
  690.  
  691.  
  692. int
  693. sim_store_register (rn, value)
  694.      int rn;
  695.      unsigned char *value;
  696. {
  697.   saved_state.asregs.regs[rn] = (value[0] << 24) | (value[1] << 16) | (value[2] << 8) | (value[3]);
  698.   return 0;
  699. }
  700.  
  701. int
  702. sim_fetch_register (rn, buf)
  703.      int rn;
  704.      unsigned char *buf;
  705. {
  706.   int value = ((int *) (&saved_state))[rn];
  707.  
  708.   swap (buf, value);
  709.   return 0;
  710. }
  711.  
  712.  
  713. int
  714. sim_trace ()
  715. {
  716.   return 0;
  717. }
  718.  
  719. int
  720. sim_stop_reason (reason, sigrc)
  721.      enum sim_stop *reason;
  722.      int *sigrc;
  723. {
  724.   *reason = sim_stopped;
  725.   *sigrc = saved_state.asregs.exception;
  726.   return 0;
  727. }
  728.  
  729. int
  730. sim_set_pc (x)
  731.      SIM_ADDR x;
  732. {
  733.   saved_state.asregs.pc = x;
  734.   return 0;
  735. }
  736.  
  737.  
  738. int
  739. sim_info (printf_fn, verbose)
  740.      void (*printf_fn)();
  741.      int verbose;
  742. {
  743.   double timetaken = (double) saved_state.asregs.ticks / (double) now_persec ();
  744.   double virttime = saved_state.asregs.cycles / 36.0e6;
  745.  
  746.   printf ("\n\n# instructions executed  %10d\n", saved_state.asregs.insts);
  747.   printf ("# cycles                 %10d\n", saved_state.asregs.cycles);
  748.   printf ("# pipeline stalls        %10d\n", saved_state.asregs.stalls);
  749.   printf ("# real time taken        %10.4f\n", timetaken);
  750.   printf ("# virtual time taken     %10.4f\n", virttime);
  751.   printf ("# profiling size         %10d\n", sim_profile_size);
  752.   printf ("# profiling frequency    %10d\n", saved_state.asregs.profile);
  753.   printf ("# profile maxpc          %10x\n", (1 << sim_profile_size) << PROFILE_SHIFT);
  754.  
  755.   if (timetaken != 0)
  756.     {
  757.       printf ("# cycles/second          %10d\n", (int) (saved_state.asregs.cycles / timetaken));
  758.       printf ("# simulation ratio       %10.4f\n", virttime / timetaken);
  759.     }
  760.  
  761.   return 0;
  762. }
  763.  
  764.  
  765. void
  766. sim_set_profile (n)
  767.      int n;
  768. {
  769.   saved_state.asregs.profile = n;
  770. }
  771.  
  772. void
  773. sim_set_profile_size (n)
  774.      int n;
  775. {
  776.   sim_profile_size = n;
  777. }
  778.  
  779.  
  780. int
  781. sim_kill ()
  782. {
  783.   return 0;
  784. }
  785.  
  786. int
  787. sim_open (name)
  788.      char *name;
  789. {
  790.   return 0;
  791. }
  792.  
  793. int sim_set_args (argv, env)
  794.      char **argv;
  795.      char **env;
  796. {
  797.   return 0;
  798. }
  799.  
  800.  
  801.